﻿Public Class mainform
    Property scorelevel1 As Integer = 0
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Panel1.Hide()
        basic.Close()
        expert.Close()
        excercise()
    End Sub
    Sub excercise()
        Dim pexcercise = New excercise
        pexcercise.Left = 50
        pexcercise.Top = 120
        Me.Controls.Add(pexcercise)
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        basic.Show() 
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        expert.Show()
    End Sub

    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
        Panel1.Hide()
        basic.Close()
        expert.Close()
        credit()
    End Sub
    Sub credit()
        Dim pcredit = New credit
        pcredit.Left = 50
        pcredit.Top = 130
        Me.Controls.Add(pcredit)
    End Sub
End Class
